home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / btrees2.arc / BTOPNKT.C < prev    next >
Text File  |  1984-12-14  |  290b  |  17 lines
  1. /*    btopnkt        */
  2. #include <stdio.h>
  3. #include <btextern.h>
  4.  
  5. int btopnkt ()
  6.  
  7. /* get an unused control block    */
  8. {
  9.     int i;
  10.     for (i = 1; i <= MAXFIL; ++i) {
  11.         if (btfilar[i].handle == NULL)
  12.         return (i);
  13.     }    /* end for */
  14.     return ((i > MAXFIL)? - 1 : i);
  15. }    
  16. /*   end of btopnkt    */
  17.